home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Run Magazine ReRun 1989 Special Issue
/
rerun-1989-special-issue.d64
/
ball demo
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2022-09-20
|
300b
|
9 lines
10 rem screen border set up for bouncing balls
20 rem
30 ifa=0then print"[147]loading bballs.irq":a=1:load"bballs.irq",8,1
40 print"[147][176][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][174]";
50 forx=1to23:print"[221] [221]";:next
60 print"[173][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192]";:poke2023,125
70 sys49152
80 goto80